define one1:integer;
define I:byte;
define J:byte;
define W:word[3];
define K:char[2];

begin
 W[1]=2
 W[2]=10
 W[3]=7
 I=0
 J=5
 While I<3 do
  begin
   I=I+1
   if W[I]<J then
    begin
     PrintW(W[I])
     PrintS("<5")
    end
   else
    begin
     PrintW(W[I])
     PrintS(">=5")
    end
  end
end.

